home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Development / Source / Controls GH ƒ / utilities.c < prev    next >
C/C++ Source or Header  |  1994-03-04  |  3KB  |  129 lines
  1. #include <GestaltEqu.h>
  2. #include "utilities.h"
  3. /********* CopyRect ********
  4. **** take one rect and copy it to another
  5. **** as this is a useful routine, is small, and
  6. **** is used in a lot of places, I've hand assembled it
  7. **** hopefully, it's as fast as possible *****/
  8. void CopyRect(Rect *src, Rect *dest)
  9. {
  10.     asm 
  11.     {
  12.         MOVE.L    src, A0 // move pointer to src into A0
  13.         MOVE.L    dest, A1 // move pointer to dest into A1
  14.         MOVE.L     (A0)+, (A1)+ // move first point into dest, increment both
  15.         MOVE.L    (A0), (A1) // move second point into dest, no increment
  16.     }
  17. }
  18. /************* Using32Bit *******
  19. ******* calls gestalt to answer the question "are we in 32-bit mode"?
  20. ****** hopefully, the gestalt glue will return an error in systems
  21. ****** before gestalt was available (6.0.4?) ******/
  22. Boolean Using32Bit(void)
  23. {
  24.     long    response;
  25.     OSErr    iErr;
  26.     Boolean    result = FALSE;
  27.     
  28.     iErr = Gestalt(gestaltAddressingModeAttr, &response);
  29.     if (!iErr && (response & 1L))
  30.         result = TRUE;
  31.     return (result);
  32. }
  33. /********** TestForColor *******
  34. ***** answer question "Do we have color quickdraw?" ***/
  35. Boolean TestForColor(void)
  36. {
  37.     SysEnvRec    theSysEnv;
  38.     OSErr        errCode;
  39.     Boolean        result = FALSE;
  40.     errCode = SysEnvirons(curSysEnvVers, &theSysEnv);
  41.     if (!errCode)
  42.     {
  43.         result = theSysEnv.hasColorQD;
  44.     }
  45.     return (result);
  46. } 
  47. /******** UseColorQD *******
  48. **** answer the question, "Is the rectangle completely on
  49. a deep color screen?" *******/
  50. Boolean UseColorQD(ControlHandle me, Rect *theRect)
  51. {
  52.     PrivateHandle    privData;
  53.     Boolean            result = FALSE;
  54.     Rect            myRect, ctlRect;
  55.     Point            origin;
  56.     GDHandle         gd;
  57.     Rect            intersection;
  58.     short            newDepth, flatest = 32;
  59.  
  60.     privData = (PrivateHandle)(*me)->contrlData;
  61.     
  62.     // first check to see if I can check the devices list for the depth of my control
  63.     if (!privData)
  64.         return (FALSE);
  65.     if (!(*privData)->useColorQD)
  66.         return (FALSE);
  67.     if (!(*privData)->devicesAvailable)
  68.         return (FALSE);
  69.         
  70.     CopyRect(theRect, &ctlRect);
  71.     origin.h = ctlRect.left;
  72.     origin.v = ctlRect.top;
  73.     LocalToGlobal(&origin);
  74.     OffsetRect(& ctlRect, origin.h, origin.v);
  75. /******** code provided by Leonard Roesenthol **********/
  76.     gd = GetDeviceList();
  77.     while(gd)
  78.     {    if(SectRect(& ctlRect,&(*gd)->gdRect,&intersection) &&
  79.             TestDeviceAttribute(gd,13) &&     /* screen */
  80.             TestDeviceAttribute(gd,15))        /* active */
  81.         {    newDepth = (*(*gd)->gdPMap)->pixelSize;
  82.             if(newDepth < flatest)
  83.                 flatest = newDepth;
  84.         }
  85.         gd = GetNextDevice(gd);
  86.     }
  87. /****************************************************/
  88.     if (flatest > 4) return (TRUE);
  89.     else return (FALSE);
  90. } 
  91. /* CODE EXAMPLE #1  these trap availables algorithms are from Think Reference*/
  92. #include<Traps.h>
  93. #include<OSUtils.h>
  94.  
  95. #define TrapMask 0x0800
  96.  
  97. short NumToolboxTraps( void )
  98. {
  99.     if (NGetTrapAddress(_InitGraf, ToolTrap) ==
  100.             NGetTrapAddress(0xAA6E, ToolTrap))
  101.         return(0x0200);
  102.     else
  103.         return(0x0400);
  104. }
  105.  
  106. TrapType GetTrapType(short theTrap)
  107. {
  108.  
  109.     if ((theTrap & TrapMask) > 0)
  110.         return(ToolTrap);
  111.     else
  112.         return(OSTrap);
  113.  
  114. }
  115.  
  116. Boolean TrapAvailable(short theTrap)
  117. {
  118.  
  119.     TrapType    tType;
  120.  
  121.     tType = GetTrapType(theTrap);
  122.     if (tType == ToolTrap)
  123.     theTrap = theTrap & 0x07FF;
  124.     if (theTrap >= NumToolboxTraps())
  125.         theTrap = _Unimplemented;
  126.  
  127.     return (NGetTrapAddress(theTrap, tType) !=
  128.             NGetTrapAddress(_Unimplemented, ToolTrap));
  129. }